﻿Imports System
Imports System.IO
Imports System.Runtime.Serialization
Imports System.Runtime.Serialization.Formatters.Binary
<Serializable()> Public Class ProjSetAndResult
    Implements ICloneable

    Private m_ProjSet As New ProjSet
    Private m_ProjResult As New ProjResult
    Property ProjSet() As ProjSet
        Get
            Return Me.m_ProjSet
        End Get
        Set(ByVal value As ProjSet)
            Me.m_ProjSet = value
        End Set
    End Property
    Property ProjResult() As ProjResult
        Get
            Return Me.m_ProjResult
        End Get
        Set(ByVal value As ProjResult)
            Me.m_ProjResult = value
        End Set
    End Property

    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim objCopy As New ProjSetAndResult
        objCopy.m_ProjSet = Me.m_ProjSet.Clone
        objCopy.m_ProjResult = Me.m_ProjResult.Clone
        Return objCopy
    End Function
End Class
